SING - LINK 
6 No.3 MAY - JUNE '88 


SUMMER ISSUE 


SINC-LINK IS A PUBLICATION OF THE 
TORONTO TIMEX-SINCLAIR USERS CLUB 


AND IS ISSUED 6 TIMES A YEAR. Page 2 - A 2068 Disk 
COPIES OF THE NEWSLETTER ARE $1.50 í Interface Standard 
EACH FOR NON-MEMBERS. CLUB MEMBERS | Page 3 - QL WAYFARER 
RECEIVE A FREE COPY AS PART OF THE | Page 4 - Re-inking printer 


$20.00 ANNUAL MEMBERSHIP FEE. ribbons 

Page 5 - Sincbits 

Page & - Cartooning with 
NEWSLETTERS ARE EXCHANGED, FREE OF the 2068 
CHARGE WITH OTHER TIMEX-SINCLAIR Page 7,8,9 - Bob's Notebook 
USER GROUPS. Page 10 - Larken Repair Prog. 
i Page 11,12 - Larken Disk Copy 
ALL MATERIAL IS PUBLIC DOMAIN AND Utility 
CAN BE REPRINTED. PLEASE CREDIT Page 13 - Disk Droppings 
THIS PUBLICATION AND THE AUTHOR Page 14 . - PC-Draw Review 
IF YOU COPY MATERIAL. Page 15 - 2068 Tips 

Page 16^  - ZX81 M/C Routines 
SEND CORRESPONDANCE TO: Page 17 - ZX81 Larken I/F 

Cased 

Attention: SINC-LINK EDITOR Page 18 - ZX81 EPROM Con't 
TORONTO TIMEX-SICLAIR USERS CLUB Page 19 - Questions & Answers 
P.O. BOX 7274 Stn. A, TORONTO Page 20 - The Last Page 


ONTARIO, CANADA M5W 1X9 and a whole lot of good stuff 


in between, so read on! 


EXECUTIVE OFFICERS: 


PRESIDENT: ED MAYBEE (743-8141) 

VICE PRESIDENT: JEFF TAYLOR (244-8583) 
TREASURER: BILL LAWSON (444-8772) 
SECRETARY: GEORGE CHAMBERS (751-7559) 
ACTIVITIES DIRECTOR: RENE BRUNEAU (531-9749) 


TAPE LIBRARIAN ZX81: 
TAPE LIBRARIAN 2068 
TAPE LIBRARIAN QL 


RENATO ZANNESE (635-6536) 

REG COTTLE (785-3987) 

PAPER LIBRARIAN TOM AROELLA (653-6978) 

NEWSLETTER R. BRUNEAU, J. TAYLOR, R. ZANNESE 
LIAISON OFFICER (Out-of- -town members): GEORGE CHAMBERS, 

14 RICHOME COURT, SCARBOROUGH, 
ONTARIO, M1K 2Y1 (416-751-7559) 


TORONTO TIMEX - SINCLAIR USERS CLUB 


P. O. Box 7274 Stn. A Toronto, Ont., MSW IX9 
Canade 


eo oo oo 


2068 


New for your TS2068 from LARKEN ELECTRONICS 
THE LARKEN 256K RAMDISK 


Finally available for the 2068 is a practical memory expansion 
that can be used with all 2068/Spectrum software. The  LARKEN 
Ramdisk system is as easy to use as a tape recorder or floppy 
disk. 


When Tinex originally designed the 2068, they planned on 
having an expanslon buss system that would allow extra memory 
and other peripherals such as disk,  microdrives, etc., to be 
easily added and linked to the 2068's operating system. However, 
they never did complete this proposed operating system due to 
the cancellation of production of the TS2068. Even if they had 
it would not have been Spectrum compatible, so only programs 
written for the 2068 would work on it. 


The Larken Ramdisk system consists of the LKDOS careridge 
(Larken disk operating system) and a rearemounted  NONeVOLATILE 
memory board. The LKDOS cartridge allows you to access the 
Ramdisk with all the standard BASIC commands such as LOAD, SAVE, 
CAT, ERASE, MERGE, etc. THe LKDOS lets the Ramboard emulate a 
very fast floppy disk. It can load 32K in 1.5 seconds. Programs 
can be saved, loaded, or merged just as you do with a floppy 
disk, and the LKDOS keeps a keeps a catalog of all files on e 
Ramdisk, which is accessible by the CAT command. All the 
standard cassette type commands for Basic, Code, or Arrays are 
used. The command PRINT #4: is placed in front of the cassette 
type command to direct it to the Ramdisk instead of cassette, e. 
E. Print #4: Load "filename" SCREEN$ 


The memory board mounts on the rear buss of the 2068 and has a 
thru connector. It uses the new 32K byte static RAM chips (the 
62256«1p). These cost approx $11913 each in the US. The board 
comes with 64K (2 chips) but the user can add up to 6 more for a 
total of 256K. There are four sockets on the board so the first 
128K can be just plugged in, but the second 128K must be 
piggybacked tana soldered) onto the back of the ist bank. A 


board with 128K or 256K installed can also be supplied on 
special order. 


The memory board is fully battery backed up by 2 ‘AA’ 
batteries on the board. These will retain data for months. A 
special automatic Write Protect circuit protects data during 
power up or down. The board is very reliable and can even be 
removed from the computer and transported without losing data. 
the daca on the Ramdisk is also sumchecked by LKDOS so files can 

e verified. 


The memory board is mapped into the upper 32K of the cartridge 

bank. A port on the board can select 1 of 8 banks of 32K. This 

memory could also be used by the user to contain a AROS software 

program in one of the banks while not interfering with the 
disk operation. 


The Ramdisk is fully compatible with the Larken Floppy Disk 
Interface and also Ramex and Oliger disk systems if ey are 
using the LKDOS cartridge as their DOS. when used with a floppy 
disk system, the GOTO command is used to select the curent 
drive. All programs and utilities written for the floppy disk 
are fully compatible with the Ramdisk. 


It is also Spectrum and 0564 compatible. Besides having the 
operating system for the Ramdisk, the LKDOS cartrid also has 
10 extended commands for windows, graphics, and utilities. An 
NMI snapshot push button can even be added to the ramboard s0 
any program can be added to Ramdisk with the push of a button. A 

ogram is also included to download the contents of the Ramdisk 

o cassette or floppy disk. 


PRICES: «RAMDISK (with 64K) and LKDOS eere $129.95 
«Memory board only for adding to existing 
LKDOS disk system (64K) i er Hi 200000979200 
«Complete LKDOS storage systeme oppy 
disk interface, Ramdisk (64K) and LKDOS.....$179.95 


All prices are ($US), add $5 shipping 


LARKEN ELECTRONICS, RR #2 NAVAN ONTARIO CANADA K4B 1H9 
(613) 835 2680 


A 2068 DISK INTERFACE STANDARD 
by Bill Ferrabee 
from Pixel Print Press-Winter 


T/S computerists are well used to working with 
cassettes for data storage. SAVEing and LOADing 
programs and files using that G.E. or Panasonic 
recorder is old hat to the veteran T/S user. 

The casette is by far the cheapest way to go. Blank 


tapes are easy to find, economical to buy, and simple 
to use. 


But cassettes are SLOW. Yes, the 2068 does use a 
high-speed system to transmit data to/from tape. It is 
an improvement over the 1000/1500; but it 4s still not 
fast enough for some. 

Microdrives are faster, but are not very 
cost-effective. Cartridges are costly, hard to find, 
and the system just hasn't really caught on. 


The solution is disk drives. The initial 
seem expensive when compared to cassette, 
increased storage capacity, access time, and 
programming flexibility makes the investment 
worthwhile. (Now if I could just convince my wife!) 


cost may 
but the 


Now arises another problem. There are a number of 
disk interfaces to choose from. AERCO, Oliger, Ramex; 
even Timex themselves have a limited run of their own 
disk interface. 

The problem is one of "compatibility". Each company 
designed their "operating system" differently. A disk 
made on the AERCO system, for example, will not run on 
a Ramex system. 


But Larry Kenny has come up with a solution. His 
LARKEN system has a well-built interface that will 
hold up to 4 drives. 


But it is the "Extended Basic" cartridge that solves 
the problem. If you own an AERCO, Ramex, or Oliger 
interface, you can buy his cartridge, and make your 
system LARKEN compatable. This will allow you to share 
disks with other people that have LARKEN cartridges. 


Finally, a STANDARD! I commend Larry on the advance 
he has made towards setting a T/S disk drive standard. 


Lets get behind Larry on this endeavor...it could 
mean even better software could soon be available soon 
for T/S users! 


Retyped from the March '88 issue of the Sinclair 
Louisville Users Group newsletter. There is also 
reference to the Timex/Sinclair/Amstrad Metroplex 
newsletter, which may be the original source. 
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QL WAYFARER BY REGINALD COTTLE 


Rerausp of hoiigev scnsouiing. increased work iced. ano family 


iliBEZE, ll nas DEED 3 nuEDEr Of LSSUBS SINCE fy last resort. 


You wiii De deiionter tc know we nave had our first enquiry 
about the newest acditicn to the Sinclair Family: ihe 183. 
Computer programmer Mr, Charles Baonal of Level 7 Research in 
Toronto purchased one at Dixon's in England and is thrilled with 
it. He is willing to seet with anyone interested in purchasing 
one and give a cescnstration and would like to join the ciub 
when there are members he can interact with, I told hia that 
from all reports he might not have to wait long. His phone 
nusber can be obtained through ae at anytise. 


On the OL scene I recently spoke to Mr. John Gordon of Lytons 
who informed se that Lytons is in the process of doing a 
feasability study of the possibility of using three OL's for on 
line diagnostic system testing and monitoring. 


I recentiy received a copy of the Quanta OL software librarv on 
disc. I understand the latest release is on 15 discs. My release 
consisted of 10 discs DSDD 720K per disc. 


Some of the procrarses had a ssall royalty charge attached but 
sany are free ano under the Quanta constitution can be freely 
exchanged between seabers and member groups. I would also like 
to thank Real Gagnon on behalf of our mesbership for a 
contribuion of freeware to our GL library. Real Gagnon is the 
SIN Editeur in Montreal, Guebec. He has sent us: å window 
designer ( a utility to help design windows); a solitaire game; 
a caps utility that adds two new kevwords to superbasic, they 
tern caps lock on and off; å label making prooraa; a  TRAduction 
programse for utilization cf the TRA funcions; a swap procramse 
for resaming devices in a Drogramae: a blank prograase to blank 
the screen if there is no activity for three- minutes, space 
reactivates the screen; a link programme to link your library of 
superbasic extensions and a hex/binary programme to translate 
hex files to binary or binary to hex. Real's disc has been 
updated with all the current library files and after some delay 
is now on route back to his with both our thanks and our 
caplisents for his fine programming and support. 


I recently received a circular from Ron Gowan of RNG outlining 
the content and availability of Video cassettes of the 7 
seminars that took place at the Seattle Mini Fair. These 
seminars cover all areas of Timex/Sinclair computing froe 
sachine code programming on the 2581 by Fred Nachbar, to 
orogramming with vour ii, St $15.95 US it sounds like a resource 
that no Tisex/Sinciair users group should be without. 


"EMIT ac ERT : e MM å any 
I éinaliy receives my S057+ floppy 1nteréars cortne gL froa co! 


but not cetore ) i 


à. five wet 


i3 stee. I ran 
compiner with 7 ne Deiav, 
At first glance it is identical io tne 
interface, althouon cn cicser exaginaticn we sinc t^e board to 
be euch gore censiy pocuiated with a 36 pin zcnnedtor for hard 
drive and a 26 pin for Sugart standarü tioopies. ine intertace 
will accept up to 8 hard disc drived and two fioppies. It is 
designed to work with the Rodime compatible Winchester RO 652 or 
a Miniscrive 8425 S, Now all we need is a good inexpensive 
sourse for either of these drives. Anyone who knows of one can 
pass this information along to us all by writing to the: 


ÅL Wayfarer 
840 Eglinton Ave, west. 
fot. 302 
Toronto, Cntario 
Canada 
KN 161 


February, 1988 


QL Tips: Joe E. Jenkins of Amarillo, 
Texas writes; 


“When I finish typing In a program 
Listing and I want to EDIT it, I ENTER 
EDIT and first line number. I then use 
the "down" arrow to advance Line by line 
to carefully check for errors." 


Btll Lawson says: "This tip Is also 
helpful If you are using "AUTO" (for 
automatic numbering). Should you 
discover, after entering a. line, that 
there is an error, use the "up" arrow to 


. bring the Line back into the work. area, 


correct the error and use the "down" 
arrow to move to your next "AUTO" 
number." 


J.E.J. also sends this tip: If you have 
a Quill program that is too long for 
Quill to print, save It on microdrtve 
and then, COPY MDU1. or 2 "f!lename" to 
SCR (for screen monitor) or 

MDU£, filename to SER1 (for printer). 
Don't forget to open a channel to SERI. 
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RE-INKING PRINTER RIBBONS 
by George Chambers 


In the March/April 1987 issue of SINC-LINK I 
mentioned a place in Toronto where one could get ink 
for re-inking printer ribbons. 


I purchased a bottle of it, and since then have 


been trying to figure out a way of getting the ink 


onto the ribbon uniformly and without too much mess. 
Not with much success until one of our members, Tom 
Haller, demonstrated a successful method. 

Tom found that that he could buy a small plastic 
ink dispenser that was made for the purpose, designed 
to be used with the professionnal re-inkers that you 
can buy for about $65 US. He purchased this dispenser 
for a rather nominal sum. Essentially it consists of a 
small plastic container with a tiny hole in the side 
over which the ribbon passes, absorbing ink as it 
goes. He suggested that a pill bottle or something 
similar could also do the same job. 


My ribbon cassette (Smith Corona L1000 printer) is 
about 3 inches by 4 inches by 3/4 inch in depth. I 
mounted it flat on a piece of wood, holding it in 
place with wood strips and with a hold-down spring 
made out of a piece of scrap phosphor-bronze weather 
stripping material. 

For the ink container | used an small UHU gluestick 
housing. I shortened the housing by cutting off the 
bottom section. From this discarded section I removed 
a small plug-like piece, and epoxied it into the 
bottom of the housing. This gave me a solid container 
with a screw-on cap. I then pierced the side of this 
container, about 3/4 inch from the bottom. I used one 
of those pins that have a small bead for a head. Used 
for marking maps, etc. This seemed give about the 
right size hole. Actually I tried meiting the hole by 
heating the pin with a match. A mistake, because the 
pin started to melt the plastic, and threatened to 
ruin the hole. The edge of the hole may be rough from 


This made-up ink container nas to be secured to the 
baseboard,vertically, in sucn a way that the centre of 
the ribbon will pass over the hole in the container. I 
drilled a hole in the base-board to hold the ink 
container in a vertical position. I placed it such 
that the ribbon made a detour of about 3/4 inch from 
it's normal path, to pass over the side of the 
container. This seems to hold the ribbon against the 
container sufficiently, without undue drag. 

I found that the hole I made in the base was a 
loose fit, so [ mixed up some epoxy glue and sandpaper 
dust, and made the hole a snug fit for the container. 
This is a bit tricky, though. For convenience you want 
to be able to remove the container from its recess. At 


the same time you want it to be secure in position 
while inking. If you are not careful you will glue it 


in there permanently, Putting a piece of paper around 
it, or coating it with grease should prevent this from 
happening. (There are other ways you can secure the 
ink container .....use your imagination) 

You may need to shift the ink container up or down 
so that the ink hole is centred on the ribbon. In my 
arrangement the container is a sort of press fit, so 
it stays put yet is readily shifted as necessary. 

The ribbon cassette has a small finger knob which is 
used to move the ribbon. I made up a small crank out 
of piano wire (craft shops carry this) and use it to 
crank the ribbon past the ink. I contemplate using a 
variable speed drill to drive the ribbon. I shall try 
using a piece of coil spring as a coupling between the 
drill and the cartridge knob. 

In the article mentioned above I said: 

"Ink will cost you $8 a bottle...good for anywhere 
from 10 to 60 applications, depending on the ribbon. 
ABBA COMPUTER CORPORATION is in Markham, Ont., at 21 
Amber St., Unit 4, Phone (416) 477 4033." 

Times have changed. Ink now costs $9. ABBA are still 


the process. Smooth it off so the ribbon will pass at the same location and phone No. 
snugly over the hole. €———— erten 
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SincBits 
Ian Robertson 


UPDATES: I wish to thank Tom Bent for pointing me in the 
direction of the NEC P2200 24 pin printer. It isa great printer 
and seems to work well with the QL, 2068 and the Spectrums. It 
will probably work with the ZX-81, if I had enough energy to try. 


TS2068: Rumour has it that JOHN OLIGER has completed his last 
upgrade for the JLO SAFE DOS. It is v2.5 and has the long 
awaited ERASE command. Good news to this sloppy user. 


SPECTRUM: This item should really be in the UPDATES section, but 
is so important that it deserves to be featured. The news is - 
the SPECTRUM CLONE, now codenamed SAM is fast becoming a reality. 
So says Simon Goodwin in the latest issue of CRASH. He has seen 
and used the hand built prototype system at MILES GORDON 
TECHNOLOGY, MGT for short. It runs all the software tried to 
date (although some do suffer slightly). The specs are 
interesting. It uses a 6 MHz Z80B, has a 48 key keyboard, 32k 
ROM, freely mappable 8x16k pages of RAM and the built-in ports 
include RGB/SCART, composite video, PAL UHF TV, light pen, 
cassette (2250 baud), network, MIDI in/out, joystick/mouse, 
ROM/Spectrum parallel bus. The sound chip will probably be the 
AY-3-8912, although the MGT favourite is the YAMAHA SA1099 stereo 
chip with an eight octave range, which can play up to six notes 
and two noises at the same time.  MGT (manufacturers of the 
DISCIPLE and the PLUS D disk drive interfaces) have designed a 
disk interface into the SAM logic array and will be bringing out 
a 3.5" 1560k compatible drive soon after the launch of the SAM. 
The SAM and the drive will retail for £99.00 (sterling) each. If 
it were not for Simon's column, CRASH would be just that. 


QL: Lots of activity in this section, again. The most important 
item, to a dedicated QL user, is the news that A+ may be selling 
their entire QL inventory to an offshore buyer. To add to this 
gloomy scenario, most QL dealers seem to be either almost or 
entirely out of stock. Sure am glad I bought one of those $99.00 
Specials as a spare! Now for some brighter news. If you like 
QUILL v2.21/v2.3, then you will LOVE v2.35 with both TURBO + and 
SPEEDSCREEN. It kind of sneeks up on you. At first you do not 
realize that it is working better/faster, as it just appears to 
work as you think it should. That is the secret. It works just 
the way QUILL should have in the first place. I just received 
TEXT87 and am presently having problems getting it to work. 
Hopefully I will be able to report on it next issue.  SHARPS are 
now selling a companion disk interface to the TRUMP CARD. It is 
called the ACE CARD and comes with all the goodies of the TC 
except it only has 256k memory and not the gigantic 768k of the 
TC. The good news (again good news) is that it costs $90.00 less 
than the TC, or $229.96 US to those counting. If you are a QL 
user and do not subscribe to one of the three dedicated QL 
magazines, you are missing out. The QL market is booming (well 
almost booming), at the moment, with new software and hardware 
items offered almost every month. If you want to continue to use 


our QL as a serious computer, then, you should, stock up while you 
ON cane My wife thinks I can fold out to the year 8000. 
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4 G.: NELSON ROBINS 

I am a newcomer to ihe uorid 
SF TOMPUTEers as weli az being : 
neucomer in the club. The first 
thing I found out when iki 
to different seapte about their 
computer is that they set out is 
nave it do something  especialiu 
to suit their taste, whether ii 
be Programming games is running 
a business. de all want our 
computers in do Something ia 
make cur Lives a Little easier 
as weii as Jive us 


entertainment. 

I am no exception to the rule. 
Hy major interest has siways 
been in the fieid of animation, 
but especiaily cartooning. I uas 
disappointed when upon reading 
the manual, it contained oniy a 
short Paragraph on animation and 
nothing whatsoever an 
Cartooning. Thus I nunted for 
books on these subjects. I found 
iots Gf books but veru few couid 
be used With the 2866. Lacking 
the programming zkiliz, I uas 
ready to throw in the i i 
Untii = joined the club and 
Started using the tape Library. 
i was very fartunate when one af 
the members ioaned me zoe back 
issues or TIME DESICH. Now I uas 
able tio find books as weii as 
Programs for my 2868: 

Hy biggest break came, I wouid 
have ło sag, when I obtained = 
program cailed ARTWORK. I was 
finaiiy on the road to doing 
some zerious cartooning. 

First off had to decide on 
something a zomeone to turn 
into a cartoon. I decided an 
using Hr. Spoci. Finding a 
Faifiu Clear photograph to guide 
me in my venture, I started 
creating Mr. Spock with the heip 
or RRTVORX. i Found I used the 
zoom feature the most. This was 
easier to control than using the 
brush Feature, especially for 
the eyes and the structure oF 
the mouth. I had one problem 
with the program. I found the 
JOYStick kept returning ta the 
main menu and this, at times, 
was very Frustrating. Switching 
to the keyboard didn't totaliy 
salve the problem but helped io 


"yb 


Make drawing much easier. STEP 
#1 shows Spock in his rough 
Stage. 

STEP #2 shows what I obtained 
dy using grey-zcaiing. 
Unfortunateiy ARTWORX does not 
have this function. There is 
another program avaiiabie 
through a Dag IDE caitied BYTE 
POGUER ian PO can 


be found 


Magazine entireiy x and 
What if 900d about this is that 
the programs are alt ready io 
run. å Listings Whatsoever io 
type ini Their Programs ange 
From Games :most GF Which afe in 
Machine code! t utilities For 
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improving the 29868. az weii aS 


your bUSinest. he Program a 
used for my greu-scaiinsg is 
called 55P iSmMait Screen 
Picture) and i5 found i the 
Sept i986 issue. I USE 
grey-scate as border, For 
Shading and as well to add more 
detail to Spocks Face. The 
arrow is used to Place the 
grey-scaie. Note: make sure 
there is no area for the 
grey-scale to bleed through. 


It’s best to do å once-over with 
Zoom and Close any areas. ALSO, 
instead of using the joystick 
for menu calls, SSP uses the 
Space bar. No more accidentai 
menu calls! 

STEP #3 shows now I 
speech bubbles using the 
feature, ctearing anu unwanted 
overage. Inside I then placed 
What I wanted Spock to say. Hy 
finai touch was io create a 
Caption. SSP uses iwo tettering 
Fonts, the normai biach on white 
and white on biacz. I used the 
white on black for my caption. 

Now I have 3 completed cartoon 
frame, showing that it is 
possible to create cartoon 
frames and even a full comic 
strip with your 2868. 


created 
circte 


STEP #1 
(ROUGH DRAUING) |, >n 


SPOCK REPLIES TG KIRK’S 
QUESTIONING STARE.... 


step * 3 


— 


See o c 


MIT FEIE laks 
TASWORD TWO PATCHED (AGAIN?) 


4hen ara 
Tasword? 


People going to 
Probably never and more Power to "em. There 
are scme vary good ideas floating around from those 
who have a co at making a "good" program "better (?)*, 
I have taken some of them, added a feu of my own and 
here is my patch which I call version 4.2. 


i. This change is one that should have been in from 
the beginning, It simply reactivates the 152040 
printer after each return to the text file (Line 10) 
by POKING 25703,0:25704,5. These POkes are changed 
zach time you select the wide printer mode. 


2. i've included a word count which appears each time 
you call the STOP menu; it appears right after the 
edit iine option. This code starts at 37100 and is 88 
bytes long. More about this later. 


3. There is an option for saving the AUTOSTART boot of 
this version; this assumes you have the Larken LKDOS 
(Line 9000). 


4, Then I show a routine to allow for the changing cf 
the text PAPER and INK colours to suit your taste and 
that of your monitor (Line 9100). This would seem 
iike a one time facility but it takes a feu tries to 
get your choice just right. For example, I used the 
following: 


zu 
> 


Area PE 
Text it 
L&R Margin i 
Bottom Screen Top Line 5 
Bottom Screen Bottom Line g 
44 column Border 1 
32 column Border å 


When you get it right, GO TO 9300 and SAVE your new 
version of taswo. C2, 


5. The LOAD text option brings up the Catalogue (CAT) 
of the LKDOS disk to remind you what texts are 
available so that you may LOAD the text of your 
choice. NOTE: The ENTER prompt in this program is 
INPUT LINE a$ which eliminates the quotes around the 
INPUT cursor. This neat trick prevents your 
accidentally EDITing out the quotes which usually 
messes uz the INPUT ing. 


2. The PRINT OPTION menu will present uou with the 


choice of setting the Line spacing (eg, double for 
draft copies,) the left margin and other regular 
options. 


stop fooling around with 


2068 


3 


bring up ine 
have been simplified, 


8. If uou don't have the c 


814CH 
3154H 
S15CH 
8164H 
B16CH 
8174H 
81 7CH 
8184H 
818CH 
B194H 
B19CH 


OQ 
EO 
OQ 
?E 
20 
40 
FE 
06 
13 
20 


OB z 


å SAGE - T... 
. The SAVE routine ar Li 


Catalogue 


: OO 
CS 


as 


OG 
D5 
00 


28 2 


00 
Oz 
OF 
OG 
01 
OE 
81 


* LOAD zn 


a. 


ode for wordcount 


09 
0o 
4C 
40 
O1 


04 
D8 
C1 


04 ` 
OG z 
DO 2 


been reworked 


to 


the error traps 


(urd. C2), 
here 1t 15 and load it to start at 33100 (814Ch). 


CD 
Q1 


AL 


LEAR VAL 


MIZE USR 
DE : 


NT 
a=NOT PI THEN 


9. To sum up: Type in the tasword listing and load 
your tasuord code to address 54784 as usual. Then do 
the colour mod and save tasword code as taswo.C2 same 
address same length. Save urd.C2, Save the Autostart, 
Then clear the 2069 and boot up tasword per LKDOS 
instructions. Bast of luck! 


10. Personally, I’m going to work on Version 4.3 which 
will eliminate the colour routine, the autostart SAVE 
and insert some new stuff, 


Bob Mitchell 
871112 


1 REM Tasword Version 4.2 
RH Mitchell 

2 REM 871112 

3 

10 .RANDOMIZE USR VAL "100": op 
EN #4, "dd": POKE VAL "23658" ,NO 
T PI: POKE VAL "26703",NOT PI: 
PORE VAL "26704", VAL "5": PAPER 
VAL "7": INK VAL "9": BORDER V 
"Z": CLS = LET a=USR VAL "64 
330": GO TO VAL "0" 

15 POKE VAL "23409", Val 
"33099": 
LOAD 


"o ma C 
RANDOMIZE USR 
"und. C2" CODE RANDO 
100: LOAD "tasuo.Cz2"CoO 

LET a=USR VAL "59081 
VAL "10" 

LET fszVAL "4000": LE 
"Ji": LET asVAL "454"%*] 

"64" -VAL "D.99"): IF 
GO TO VAL "17000" 


100: 


CLS 

GO TO 
20 CLS 
T th=VAL 
(a/ VAL. 
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25 PAPER NOT PI: INK VAL "7": 

BORDER NOT PI: CLS : GO SUR VAL 

"4000": RANDOMIZE USR VAL "331 
io": PRINT AT VAL "4",NOT PI;"p 
"int test" TAB ths;"p" 

28 PRINT '"save text"3TAB th; 
H 5 n 

30 PRINT *"load text" TAP th;" 
l " 

40 PRINT "edit text [" PEEK V 
AL "33105"-VAL "256"*PEEK VAL " 
33106"3" words i"; TAR ths"u" 

50 PRINT '"save Tasuord autost 
art" TAB ths;"t" 

60 PRINT ""modifu colours" STAB 

ths "mm" 

70 PRINT AT VAL "2O",VAL "11"; 
"press key" 

80 LET a$=INKEY$: IF a$="" THE 
N GO TO VAL "80" 

90 LET i=NOT PI: LET b=CODE a$ 

IF bzVAL "97" THEN LET b=b+V 
AL "32" 

110 IF b=VAL "115" THEN LET i= 
VAL "Ss" 

120 IF b=VAL "108" THEN LET i= 
VAL "g" 

150 IF b=VAL "112" THEN LET i= 
VAL "4" 

140 IF b=VAL "121" THEN LET i= 
VAL "10" 

150 IF b=VAL "116" THEM LET i= 
VAL "12" 

140 IF b=VAL "109" THEN LET i= 
VAL "14" 

180 IF i:NOT PI THEN PRINT AT 
19 VAL "31"s FLASH PI/PI:CHR% bj 

GO TO VAL "500" 

190 Go TO VAL "20" 

200: CLS : PRINT AT SGN PI, VAL 
"guy "PRINT OPTIONS""""Defaults 
in € )} Neu value";AT 21,03 
"L ENTERI" 

210 LET i=VAL "5": LET jO=VAL " 
2a": PRINT AT i, VAL "0"3 "Line s 
pacing? (1) "STAB 225: GO SUB f 
st IF a$-"" THEN LET a$z"1" 

Z11 PRINT a$ 

215 POKE VAL "5zz35".VAL a$ 

zi& LET i=VAL "8": LET jJO=VAL " 
z3": PRINT AT i,VAL "O"s"Left m 
argin? (8) "STAB 2592 GO SUR f 
si IF a$="" THEN LET a$z"2" 

217 PRINT as 
218 PORE VAL "S0927".VAL at 
zzÜü LET i=VAL "10": PRINT AT i, 
NOT PIs"Start line? (1) "STAB zc 
131 i30 SUB fs: IF a$="" THEN L 
T a$-"1" 


sal PRINT a$ 


in fl 
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230 LET c=VAL "44"*(CINT at- 
PI/PI): LET ber+tVaL : 
LET ==VAL "40045": Go ! 
950" 


240 LET i=VAL "12": PRINT AT i, 
NOT PIs"Finish line? (last)"3TA 
B 225: GO SUB fs: IF a$="" THEN 

LET b=a-ct GO TO VAL "250" 
241 PRINT a$ 
245 LET b=VAL "4£4"+INT VAL a$-c 


250 RANDOMIZE USR VAL "59806": 
RANDOMIZE USR (PEEK VAL "42472" 
+VAL "S56"*PEEK VAL "45473") 

260 CLS : PRINT AT VAL "20",NOT 

PI "Press 'a' to stop printing 

270 LET «=VAL "40049": GO SUB V 
AL "950" 

275 LET c=PEEK VAL "S2470": IF 
cZ NOT PI THEN  LPRINT CHR$ c 

280 RANDOMIZE USR VAL "50038" 

285 LET c=PEEK VAL "42471": IF 
c5 2NOT PI THEN LPRINT CHR% c 

290 RANDOMIZE VSR VAL "59806": 
GO TO VAL "10" 

500 PRINT AT VAL "ZOQ",NOT PI;" 
press the ": FLASH PI/PI;"ENTER 
"5 FLASH NOT PIj" key to procee 
d" SAT VAL "Zi", NOT PI;" press 
"3 FLASH PI/PIs"c"; FLASH NOT P 
15" to change the choice " 

510 LET at=INNEYS!: IF a$="c" OR 

a$=" C" THEN GO TO VAL "Z0" 

520 IF CODE a$=VAL "13" THEN G 
oO TO VAL "400" 

530 GO TO VAL "510" 

610 IF b=VAL "121" THEN  CLS : 
GO TO VAL "10" 

615 IF b=VAL "109" THEN  CLS 
GO TO VAL "9100" 

620 IF^bzVAL "115" THEN CLS : 
GO TO VAL "1000" 

630 IF b=VAL "115" THEN  CLS : 
GO TO 9000 
640 IF b=VAL "108" THEN LET a= 
NOT PI: GO TO VAL "2000" 

650 IF b=VAL "112" THEN 650 TO 
VAL "200" 

850 PRINT AT i;,.35a$;PEEN x: GO 
SUB fs: IF a$z;"" THEN PONE i, 
VAL a$ 
860 RETURN 
950 POKE :,b-VAL "Z56"*INT ib/V 
AL "256"): POKE (x-PI/PIO.INT ( 
b/VAL "Z256"): RETURN 
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LJOUSLET b=VAL "33280" :CLS 

1005 CLs t: PRINT 443 CAT ".CT".: 
PRINT AT VAL "Z0", NOT PIs "name 
í less the .CT)"saT VAL "Z1", NQ 
r PIG "LENTERI": LET i=VAL "10": 
LET jJUSNOT PI: GO SUB fs 

1010 IF LEN a$zSGN PI OR LEN afè 

VAL "4" THEN CLS : PRINT AT VA 

L "12".NOT PIs INVERSE 1t3"inval 
id name“: GO TO VAL "1005" 

1038 PRINT #4: SAVE a$-".CT"CODE 
Dya 

1039 GO TO VAL "10" 

zOO00 CLS : PRINT #4: CAT eo T s 
PRINT AT VAL "20",NOT PI; "name 
?(less the .CT) "AT VAL "21",NO 
T PIG "CENTER]I" 

2010 LET jO=NOT PI: LET i=VAL "1 
z": GO SUB fs 

2030 LET b=VAL "23280" 

2032 PRINT 44: LOAD as+". CT" CODE 


2045 GO TO VAL "10" 

3000 FOR 1=VAL "23296" TO VAL pee 
3361": POKE i,VAL "32": NEXT i 
3005 FOKE VAL "23362",NOT PI 
3010 PRINT AT VAL "S",NOT PIs"tu 
Pe word to be replaced / found" 


3012 LET JO=NOT PI: LET i-VAL "1 
J": GO SUB fs: IF a$="" THEN G 

O TO VAL "10" 

3020 LET J=NOT PI: FOR i=PI/PI T 

O LEM a$: POKE VAL NESEGT +t FCO 
DE a(i): IF a$(i)-" " THEN LE 
i j=jJ+PI/PI 

3021 NEXT i 

3022 IF J«>NOT PI THEN CLS : PR 
INT AT VAL "1Z2",NOT PI;"Jjust a 

word - no spaces alloued": GO T 

Ü VAL "3000" 

3025 POKE VAL "23297",LEN a$ 

3030 PRINT AT VAL "12",NOT PI;"w 
ith (just ENTER for find only)" 
* LET i=VAL "14": GO SUB fs 

3040 IF as$z"" THEN POKE VAL “D3 

362",PI/PI: GO TO VAL "3060" 

3050 FOR i=PI/PI TO LEN a$: POKE 
YAL "23229"-i,CODE a$(i): NEXT 
i 

3060 LET a=USR VAL "44955": LET 

3=YSR VAL "64333": GO TO VAL "7 

jg 

4000 PRINT AT NOT PI, VAL "9"s"Taà 

sword Tuo"tAT SGN PI VAL "4";" 
rasman Software 1983":AT VAL " 

I" YAL "J"s"Version 4.2 R.H.Mit 
shell": RETURN 

5000 INPUT LINE as: RETURN 
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7000 CLEAR VAL "23099": PAPER NO 
T PI: INK NOT PI: BORDER NOT Pt 
: CLS : RANDOMIZE USR VAL "103" 


7020 GO TO VAL "15" 

7100 CLS : INPUT "test area"”"pa 

per "paper: INPUT "ink "sinks 

LET c=paper*VAL "9"+ink 

7120 POKE VAL "SB851z",VAL "54": 

POKE VAL "598521", VAL "54": POKE 

VAL "S85123",c: PĒKE VAL "58522 

+c 

9130 INPUT "1 & r margin area"’" 

Paper "Paper! INPUT "ink "sink 
= LET c=paper*VAL "S"+ink 

9140 POKE VAL "S58509",VAL "54": 

POKE VAL "58517",VAL "S4": POKE 
VAL "S38509",c: POKE VAL "58518 

VE 

9150 INPUT "bottom screen area T 

OP line"”"paper "paper: INPUT 
"ink "sink: LET c=paper*Val "9" 

+1nk 

9155 POKE VAL "59993",c 

9160 INPUT "bottom screen area P 

OTTOM line"? "paper "paper: INP 

UT "ink "sink: LET c=paper*VAL 
"9"+ink 

9165 POKE VAL "54570", 

9170 INPUT "54 col border colour 
"sb 

9175 INPUT "32 col border colour 
"bl 

9180 POKE VAL "$4514",5: POKE VA 

L "60841", bi 

9200 GO TO VAL "1g" 

97300 PRINT #4: SAVE "+aswo.C="CO 

DE 54784,10751 


WHAT IS A BLACK BOX? 


YOU FEED SOMETHING IN 


LATER SOMETHING 
PREDICTABLE COMES OUT 


SUT... YOU HAVE NO CLEAR IDEA 
WHAT GOES ON INSIDE THE 80X! 
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LARKEN REPAIR.B1 PROGRAM 
by G. Chambers 


One of our members, Stephen Gunhouse, Windsor, Ont. 
has come up with some suggestions for improving the 
program "repair.81", which was in a recent issue. 

To quote part of his letter: 


"I noticed about 3 things in the program that could 


be done better and faster. If it is of interest, 
change the following lines. 

68080 CLS 

62Ø IF bS<>c$(m) THEN NEXT m 

630 CLS 

540 IF m»e THEN LET ezm: LET c 
SCe)=b$: PRINT AT 16,1135 

650 CLs 


575 PRINT AT 13,0;d$;AT 14,0;''P 


lacing names and tracks in dire 
ctory' 


ame+f,k+128: 


885 CLS 

720 LET F=41 

730 FOR k=4 TO d 

749 IF cS(e)=a$(k) THEN 
LET f=f+1 


POKE n 


750 
760 
770 
789 
790 


NEXT K 

POKE name+f,249 

LET name=name+34 
PRINT AT 16,113;c$(e) 
NEXT n 


DELETE 8ØØ to 858 


10 


"I no longer use the variable trackno, I am referring 
to name instead. 

"I know some of the changes are considered bad 
practice in other computers; Sinclair BASIC does not 
require you to properly terminate FOR-NEXT loops. 
Removing the extra loop in 680-850 should speed up the 
process quite a bit, as should shortening the track 


loop now in 730. 
ee de dede dee de dde ende År 


MOLASSES IN JANUARY 

This seems to be an apt description of 
Larken Electronics response time, based on 
member's experience. Whether it be 
inquiries, orders, service, or repairs it 
seems to take forever to get a reply. Come 
on, Larry, your customers deserve better. 

xoxo ae ae xe He ea A 


If you want a response from Larry, 
it's best to phone him directly. 


IS YOUR CALENDAR PROGRAM ACCURATE? 
By Geo Chambers 


In the first issue of the TTSUC newsletter (in 1983) 
there was an article with the above title. I see where 
calendar programs still crop up and it seemed to me 
that this article could be repeated and would still be 
interesting. 


“When your calendar program states that your 
grandmother was born on a Tuesday, do you really 
believe it or is it more an article of faith in the 
program? The following list of dates will help to put 
your mind at rest, and can be used to reassure the 
dubious. 


DAY DATE SOURCE 
Monday 15 Nov. 1762 James Boswell's “London Diary" 
Wednesday 15 Dec 1762 e . a * 
Friday 6 May 1763 * s * 
Saturday 19 Mar 1763 * R i s 
Sunday 1 Jan 1660 Samuel Pepys Diary 
Sunday 4 Mar 1660 > al s 
Thursday 15 June 1665 " x n 
Friday l Jan 1669 ” " a 
Monday 5 Aug 1878 Lady Dufferin "My Ca'n Journal" 
Thursday 10 Aug 1876 * s wc» = 
Tuesday 14 Aug 1873 " . * * 
Sunday* 15 Apr 1666 Samuel Pepys Diary 
Sunday* 19 Apr 1663 " ” 3 
Sunday* 3 Apr 1763 James Boswell's "London Diary" 


*Note: These three dates are Easter Sundays. 
Pdefeseseiededeieininiesntt tt tn 


: 
3 
à 
[7] 
E: 
N 
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152068 LARKEN DISK COPY UTILITY (copy12.81) 
by G. Chambers 


The listing is a program which will copy a disk on 
the Larken system using either one or two drives.It 
has been designed to work with the current Larken 
4ystem which saves 5090 bytes per track. With some 
minor modifications it could also be used on the 
Larken system which saves 1960 bytes per track. It 
makes use of the Larken M/C "Move .C1" utility. 

With other modifications it could probably work with 
the Larken cartridges designed for the Oliger, and 
Aerco Disk systems. 

This utility is a little different than Larken's 
disk copy routine, "Move.B1". While using elements of 
the Larken utility, it has several significant 
differences. Firstly, it copies on a program basis 
rather than on a track by track basis. What this means 
is that the second disk is not a "chinese copy" of the 
master disk. Where the original disk might very well 
have a program spread over several  non-adjacent 
tracks, on the copy the program will be stored on 
contiguous tracks. Usually this is considered 
advantageous. It also means that only active programs/ 
tracks are in fact copied. Tracks not in use are not 
copied. 

Secondly, it offers the option of an automatic copy 
of all programs on the disk, or the copying of 
selected programs only. 


The program starts off by asking for the Originating 
and Destination drive No.'s. If the originating and 
destination drives are the same, i.e. single-drive 
option, the program will ask you to swap disks during 
the copying process. Otherwise it will proceed to copy 
autimatically. 

The program then loads the directory track, and 
searches it for program names on the disk. It stores 
these in an array, using them during the copy process. 

During the copying process the program shows 
onscreen the name of the program is being copied, and 
also a record of the number of programs on the disk, 
and the number currently copied or skipped. 


Lines 210-240 contain a disk operating routine used 
to load the directory buffer into memory in the 
initial stage of program operation. This M/C routine 
was covered in the Jan/Feb ‘88 issue of our news- 
letter. 
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1ØØ REM Disk Copy Pram (v1.22) 
for the LARKEN system 


11Ø REM By G. Chambers 
14 Richome Court Scarbo 
rough, Ont. CANADA M1K 2Y1 
120 REM Use to copy a disk with 


a 1- or 2-drive system 

130 REM Data statements contain 

Drive Control Code. 

140 REM For use with the DSKA4ØØ syst 
em of SØSØ bytes/track using a DD drive 
i.e.8Ø tracks 

150 RANDOMIZE USR 1ØØ: OPEN #4, "dd" 

17Ø RESTORE VAL "24g 

180 FOR n=VAL "53øøø' TO VAL "63Ø47" 

19Ø READ a: POKE n;a 

2ØØ NEXT n 

21Ø DATA 195,43,246 ,Ø,0,Ø,Ø,Ø,Ø,243 1205,9 
8,0, 201,58 
220 DATA 1ØØ,Ø,251,2Øø1 12Ø5,33,246,58,176, 
92,5Ø,29,32 ,2Ø5, 126 
230 DATA 9,205,123,0, 33,112,32,17,156 1224 
91,0,208,237,176 
240 DATA 195,38,246 
28Ø LET iFaceVAL "23728": LET loadbuf=VAL 
"63ggg' 

298 LET name=VAL "57688!" 
3ØØ BORDER PI/PI: PAPER PI/PI: CLS 
318 GO SUB VAL "agg" 
32Ø PRINT AT VAL "ər VAL "7''; INK VAL "ər 
; PAPER VAL "Gtt; LARKEN DISK UTILITY"; PA 
PER PI/PI;,,TAB VAL "3": PAPER VAL "tet stp 
isk Copying-1 or 2 Drives"; PAPER VAL !'4" 
ss TAB VAL "7!''; PAPER VAL "et; By George C 
hambers'' 
33Ø INK VAL ''3": PLOT NOT PI VAL '"'1ø8": p 
RAW NOT PI, VAL ''62!': DRAW VAL "255",NOT P 
I: DRAW NOT PI,VAL ''-62!': DRAW VAL "ess" 
NOT PI 
340 INK VAL "6": PLOT VAL "ar VAL ''114'!; 
DRAW NOT PI, VAL "Sø": DRAW VAL "238" , NOT. 
PI: DRAW NOT PI,VAL ''-5g!': DRAW VAL "=238 
",NOT PIs INK VAL "71 
350 PRINT '''"Install the disk to be copi 
edt in the originating Ürive'''",., the 
n Press a key!'!: PAUSE NOT PI 
352 INPUT "Enter the Orig. Drive No.(g-4) 
"+Odrv 
353 PRINT £4: GO TO Odrv 
354 INPUT "Enter the Dest. Drive No. (Ø=4) 

"'$0drv 

355 POKE VAL ''23658" »VAL "8"; LET rgatentee 
INPUT "Select files to save? Y/N'sr$ 

36Ø REM Picking pgm names 
from buffer(Track Ø) 

370 POKE trac,NOT PI: RANDOMIZE USR loadb 
uf 

388 PRINT AT VAL "49" NOT PIj;c$'c$'c$;TAB 
VAL ''S''Files on Disk" 
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398 FOR n= PI/PI TO VAL "Sø" 

4ØØ LET e=n 

41Ø IF PEEK (name+3)=NOT PI THEN LET e=n 
-1: LET n=VAL "'9g't: GO TO VAL "48g" 

420 IF PEEK (name+PI/PI)=VAL "254!" THEN 
LET name=name+VAL "34": GO TO VAL "'41Ø" 
430 FOR m=PI/PI TO VAL "9" 


448 LET d$(n,m)=CHRS PEEK (name+m) 

450 NEXT m 

460 LET name=name+VAL ''34" 

470 PRINT AT VAL "45",VAL "11!'';d$(n) 

480 NEXT n 

490 PAUSE VAL "3Øø'"': PRINT AT VAL ''14'",NOT 


PI;c$;CS$''TAB VAL ''14";e;"" files on disk 
tr 

SØØ DIM FS(VAL "9') 

Seg PRINT AT VAL "43",VAL "7'";"File being 
copied!" 

53Ø FOR n=PI/PI TO e 

535 PRINT AT VAL ''16",NOT PI;CS 

54Ø LET f$=d$&(n) 

545 IF r$(1)<>"N" THEN PRINT AT VAL "24" 
NOT PI;c$;AT VAL "24", VAL "3r Copy 1; 
fås rem Y/N?" 
546 LET s$=t"t"y"t: 
B VAL '"23";s$ 
547 IF s$(1)="N'" THEN GO TO 68Ø 

55Ø GO SUB OrgOrv 

555 PRINT AT VAL ''21",NOT PI;C$ 

560 FOR a=PI/PI TO VAL "S9'': POKE Onam*a,C 
ODE f$(a): POKE Dnam*a,CODE f$(a): NEXT a 


IF r$<>"N' THEN INPUT TA 


57@ PRINT AT VAL '"15",VAL 1144 FS 

58Ø PRINT £4: GO TO Odrv: LET rt=USR indi 
r: IF rt<>Ø THEN GO TO rt 

59g: LET rt=USR Ld1: IF rt<>NOT PI THEN 
GO TO rt 

600 LET Tlen=PEEK VAL ''34002": LET pass=P 
I/PI: IF Tlen>(PEEK Nbcs)-1 THEN LET Pas 
s=VAL "2" 

619 GO SUB DesOrv 

628 LET rt=USR Svnam: IF rt<>NOT PI THEN 
GO TO rt 


630 LET rt=USR Svdata: IF rt<>NOT PI THEN 

GO TO rt 

840 IF pass-PI/PI THEN GO TO VAL "67Ø" 
658 GO SUB OrgDrv: LET rt=USR Lde: IF rt< 
»NOT PI THEN GO TO rt 

660 GO SUB DesDrv: LET rt=USR Svdata: IF 
rt<>NOT PI THEN GO TO rt 

670 LET rt=USR Svend: IF rt<>NOT PI THEN 
GO TO rt 


68Q PRINT AT VAL "18",VAL "414";n;" 
d/skipped' 

690 BEEP VAL ".1",VAL "1g': BEEP VAL "4" 
,VAL ''1g" 

7808 NEXT n 
785 PRINT #4: 


copie 


GO TO Ø 
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710 FOR nzVAL "4Ø'! TO VAL "24": 
n NOT PI;c$: NEXT n 

720 PRINT AT VAL "'15",VAL ''e'';''Disk copy 
completed''!''"Press a key to copy another 
disk" 

73Ø PAUSE NOT PI: 


PRINT AT 


GO TO VAL ''eag" 


7990 STOP 
890 LET Mem=VAL '"348ØØ": LET Owka=VAL "34 
700": LET Dwka=VAL ''34750": LET Onam=VAL 


"34599g't: LET Onam=VAL ''345649"! 

810 LET indir=VAL "32ØøØ": LET Ld1=VAL "3 
2003": LET Ld2=VAL "32ØØ6": LET Svnam=VAL 
''3egg9": LET Svdata=VAL "32Ø12": LET Sve 
ndsVAL "32Ø15": LET Renam=VAL ''32g18'' 

82Ø LET OrgOrv=VAL "87Øø": LET DesOrv=VAL 
"agg": LET NbcssVAL "34ØØ3": LET Bsize=VA 
L "34øø4" 

830 REM DDen Bsize=512Ø Nbcs-7 
ze=2Ø5Ø Nbcs-14 

840 POKE Nbcs,VAL '7!'!: PRINT #4: POKE Bsi 
ze,VAL ''51eg" 

85Ø DIM d$(VAL "SØ",VAL "9'"): LET c$z" 


tr 


SDen Bsi 


86Ø RETURN 

870 IF Odrv<>Ddrv 
drv: RETURN 

889 INPUT "Insert 
ts LINE a$: RETURN 
89g IF Odrv«»Ddrv 
drv: RETURN 

SØØ INPUT "Insert 
tt; LINE a$: RETURN 
910 STOP 

9990 REM ** Save to Disk xx 

9940 PRINT £4: SAVE ''copy12.B81" LINE VAL " 
999ø" 

992ø PRINT #4: SAVE "Move .C1"CODE VAL "32 
Ooo", VAL "1ØØØ": RUN 
9932 STOP 

999@ CLEAR VAL "31999": 


THEN PRINT #4: GO TO O 


Source Disk-Press ENTER 


THEN PRINT #4: GO TO D 


Dest'n Oisk-Press ENTER 


RANDOMIZE USR 1ØØ: 


LOAD Move .C1"CODE VAL "32ØØØ": RUN 
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Disk Droppings 
by 
Greg Lloyd 


The latest offering from barken Electronics is a 256K 
RAM-DISK for the 2Ø68. It gives the owner up to 2561 
of Non-Volatile Static Ram (SRAM). This is battery 
backed storage of up to 256K of programs and data. It 
can be used in combination with the DSK 4ØØ disk 
interface and 4 disks or on its own with the LKDOS 
cartridge. It will also AUTOSTART to load and run a 
program on power up. 

The board used for the RAM-DISK is roughly the size 
of the DSK 408 - 4 x 2 inches and piggy-backs to the 
your disk interface or the expansion port on the 2068. 
It is fully through ported so other periferals can be 
hung behind. My 2050 modem and 2040 printer worked 
just fine. The order of installation does not seem to 
hatter. I used the DSK 40 interface then the RAM-DISK 
personally. 

To default to the RAM-DISK you just have to press the 
[ J ] key and [ ENTER ] on poser up. If you have saved 
å startup menu or any other application it loads and 
runs inmediately. The time involved is about one 
second. [f you have used the T/S Command Cartridge 
System to run Crazy Bugs or States and Capitals you 
vill see the advantage over tape and disk. The added 
feature is that you can save and change data on the 
RAM-DISK and it will still be there after you turn the 
Bachine off. This all happens in a blink of an eye. No 
whirring, clicking, popping, grinding, crunching, 
gorching or glitching and no red leds flashing. You 
can also use the command PRINT #4: GOTO 4 if you are 
already powered up. The LADOS software sees the RAM- 


Larry Kenney the wizard behind the system, has 
developed a back-ground print spooler. This feature 
allows Tasword files to be printed while another 
program is running. This is another plus to the 
system, the creator is using and developing further 
enhancements to the machine. And you thought you had 
an orphan computer. Sorry to disappoint you. 

SRAM chips needed for the RAM-DISK are 43256LP from 
NEC or 62256LP from other manufacturers. The latter 
are priced $26.40 (Can.) at Active Components. The 
speed of these should be 120 or 158 nanosecond. The LP 
stands for low power and unless you have an unlimited 
supply of batteries its recommended you use the LP 
version. Larken Rlectronics has some SRAM chips avail- 
able for less and Computer Shopper has them advertised 
from $11 to $13 (0.9.) if you want to wait. Price is 
now volatile in the non-volatile memory market. 

So if you have a DSK 400 from Larken and want to get 
the latest goody or if you don't have a disk and want 
some of the benefits, get in touch with your checkbook 
and order the RAM-DISK. I find it the best thing I 
ever did for my 2068 system. To quote from the movie, 
"I feel the need ... the need for SPEED". You don't 
need to join the Navy or buy and F-14, get a RAM-DISK 
from Larken and go supersonic. GBL 880420. 


LARKEN ERASE FACILITY 
by G.F. Chambers 


Occasionally one wishes to erase a number of 
files on a disk. With the LARKEN system this can 
become quite tedious because of its lengthy command 
structure. I have found the following routine to be 
quite useful whenever I have that task. I simply 
type it in, run it, and enter the program names. 


DISK as the fifth possible drive. All in all, a new 
and most unusual experience. Larken Electronics has 
not only brought 2068 disk users a nem standard of 
compatibility but now a new meaning to the phrase 
“Silent Service". 

Sir Clive's latest creation the 2-88 (bearing the 
Cambridge Computer name and a huge price tag in ay 
huable opinion), uses the same principal to store and 
operate. Solid state memory is certainly faster, more 
robust and has fewer moving parts than any disk system 


10 RANDOMIZE USR 1ØØ: CAT ''"", 
eg INPUT a$ 
1908 RANDOMIZE USR 4170: ERASE a$ 


I have seen. [ think it is the most sensible way to ,1 GO TO 29 

go, barring the resurrection of those beloved micro- 

drives. My system has 128K of SRAM on board. This gave 

me enough storage to be useful and no concern about FOR SALE FOR SALE FOR SALE 


naking the mortgage payments. 
The bare board unassembled and without memory is 
priced at $15. The assembled board without memory is 1 
available for $60. A LIDOS cartridge and software 1 
upgrade is necessary to run this option. The setup 
could be used as the only source of storage if 
desired. [t does make a neat solution to those of you 
who wish not to go for a disk drive. All other 
functions are still available so you could sare to 
tape for permanent storage and backup. 


TS2Ø68 Computer $149 or best offer 
TS2Ø5Ø Modem $49 or best offer 
Write: E. Macmillan, 
5851 Point Pleasant Drive 
Halifax, Nova Scotia B3H 187 
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Review Of PC-DRAW V. 3.0 

grå Wesel 15 a program 
for desicning printed circuit 
Boards. You can use the program 
in either the Timex mode or th 
Sinclair mode. Your drawing is 
limited to 4 inches by 10 inches 
on a SO column printer. 


You can either use a joystick 
or the keyboard to design your 
drawing. Drawings that are 
created can easily be save to 
tape. When the program first 
starts you have to customize 
your printer to the software: 
once the program is customized 
you can then save your custom 
PC-lraw. 


After tha customizing the 
program clears the screen and 
then you can start your work. On 
the bottom of the screen you 
mill find a series of words and 
IDGs. Pressing the fire button 
changes sorder color and a 
cursor should start flashing at 
ihe bottom of the screen. You 
can move this cursor and select 
any of the UDG*s. Pressing fire 
again places the UDG on the 
screen. Pressing the "C" key 
brings vou to a new menu which 
contains ZIP. DIP, CIRCLE. TEXT: 
CLZ/CLEAR. HOME. POSITION, MOVE» 
MIRROR. UNDO. STORE» EXPAND. 
CLEAVE; and LOAD/SAVE . 


"hd 
Tne 


1 


To draw iine you would go to 
the main screen» press fire and 
move the cursor on the bottom of 
the screen to DRAW. Once 
selected. you can draw a line 


between two points. You have ta 
draw the line within the screen: 
but can always move the screen 
by iust moving the cursor to the 
near the end of the screen» and 
it mould automatically scroil 
the screen. Fressing tha F key 

n ihe w mode changes the 
sursor so vau can work with one 


pixel at a time. You can reduce 
or increase the thickness of any 


character or iine. 
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Overall 


good program. Ii 


ved 


& vary 


Very easy ¢ 


ui 
Ki 


use. The print-auts come out 
very qood. The only problem I 
found with this program is the 


program 
joystick 


Commands 


CLEAVE 
CIRCLE 
CLEAR 
CLs 
DIP 
EXPAND 
LOAD 
MIRROR 
MOVE 
POSITION 
PRINT 
QUIT 
SAVE 
SIP 
STORE 
TEXT 
UNDO 


Reviewed 
April, 


doesn't seem scan 


the 
fire button properly. 


Syntax 


clev d 11 
cir rr 
clear 

cls 

dip d pins width 
exp 

load 

mir 

mov hh vv 
pos xx yy 
pri d m 
quit 

save 

sip d pins 
stor 

text 

undo 


By Renato Zannese 


25. 1988 


Availiable at CURRY COMPUTERS 


2068 


Dear George Chambers, 


I just got a news letter and from reading it, I got the 
impression that maybe I COULD offer something that some of our 
members don’t know already. 


In the process of writeing, re-writeing and fiddling around 
with a word Processing program, I’ve come across a few things 
that may be of interest to some. The following is a list of 
these things: d 


1. By useing "PAUSE 0" instead of "IF INKEY$ = "" THEN..... ue: 
not only saved memory, but found out that it makes use of all 
the computer's normal keying characteristics! (repeat, delay 
before repeating,.... å VERY powerful command!) I don't know 
why, I just happened to discover this by my endless fiddling. 


2. "IF CODE I$ = 6 THEN POKE 23658, (8 AND PEEK 23858 - 0)" 
enables the caps lock key within the program. (this one took 
Some research to figure out how to accomplish useing little 
memory) 


3. I used all 22 lines for the display in my Program. Later I 
found that to prompt an input, I would HAVE to use an INPUT 
Statement which would require keying "ENTER" after inputing the 
choice. This was bothersome, so in trying to solve this problem 
I came up with a way to use the INKEY$ function in conjunction 
with an INPUT statement. This allowed the printing of a prompt 
at the bottom of the screen while the computer was waiting for 


The following are the Program lines that allow this: 


10 IF INKEY$ = "" THEN INPUT "E-DIT/N-EXT PAGE/P-RIOR PAGE 
(SPACES TO FILL IN THE REST OF ONE LINE AND NO MORE)": GO TO 10. 


20 LET I$ = INKEY$. 


Notice that there is no variable in the INPUT Statement! For 
Some reason, this syntax is accepted! 


What this does is Print the INPUT statement if no key is being 
pressed; immediately erase it since there is no variable to 
input; then loop back around. When the computer detects a key 
being pressed, instead of re-printing the INPUT Statement, it 
assigns the value of INKEY$ to I$. 


So what you get is a very rapidly blinking prompt to an INKEY$ 
function. 


Now, back to narrative... 


written to be used with the OS-64, so my Prompt is almost a 
whole line long. (64 characters per line) 


Well, that's about it. 


Until I hear from you again, 


John Vander Stel John Vander Stel 

502 MI CO, 2ACR BOX 535 

APO NY 09093 NEWAYGO, MI 49337 
SINC-LINK 
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ZX81 
NEW LOCATIONS FOR M/C ROUTINES IN A 64K RAMPACK 
Retyped from the Sept 1985 issue of Vancouver N/L "ZXAPPEAL" 


Those of you who, like me, have a 64K Rampack know that the 
area between 8 and 16K is a great spot to put your favourite 
machine code routines. à 


The trouble is that a lot of commercially available 
peripherals, made for the ZX81, use up some or all of this area 
by squatting their ROMs all over it. 


On a normal ZX81, machine language programs do not run above 
32K; there is however a solution. It comes to us from Christofer 
Tolis, who lives in Stockholm, Sweden; via Glen Read, who 
noticed it in the British mag. "Electronics and Wireless World". 


As you may know, when address line A15 goes high (and M1 low, 
which means an OPcode fetch is in progress, as opposed to a data 
fetch, this is the reason you can store data above 32K in the 
first place) the Ferrenti chip kicks in the display routines. 
See also ZXappeal April '85. 


To avoid all this we simply make sure A15 can not go high (at 
the Ferranti chip) unless A1! does the same, which it will not 
do "n you are running a machine language routine between 32 
and 48K. 


Don't worry Al4 will be high when a legitimate display needs 
generating as long as the display file lives in the Sinclair 
sanctioned 16 to 32K area. This means that your BASIC program, 
which fills up the space between the system variables and the 
display file, must be less than 15K, in order to keep the 
display file within the 32K border, but programs that long have 
yet to be written for the ZX81. 


TO DO THE DEED: 

Cut the trace at the Ferranti #18 pin and install a 1K 
resistor. Solder a diode between pins 11 and 18 on the Ferranti 
side of the resistor using the correct polarity, and ,voila, yet 
another 16K to put your favourite machine language routines. Oh 
and by the way, these routines are of course safe from the reset 
button just as they are in tie 8 to 16K area. You knew that, 
didn't you? 

Retyped by G.F.C. 
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ZX81 


UT HOLE In BREK For 
SV POWER. TACK, 
på 


HOLE FOR Offfovyae 
AREA SWITCH 


THREE SLOTS 
FOR RIÆBONM 
CABLES Å 

EDGE Coma 
| serer CIR 


| $wireu- CS z& TEXT) 


i | 5vpe 
RED LÆAAD SUPAy 
MOVED oanp NR 


\ PLAS Tle —/ 
| PCR MOUNTING 


U^ 


SPACER 


DRILL HOLES IN 
RAILS Å FILE A NOTCH 
IN PCB TO LOCK oW. 


XA DIAFERENTF 
REPROACH TO SWITCHING DEF THE 
BOARD IS SHOWN BY Tim STODDARP 
14 ‘TIME DESIGNS! Von 3 woó6 


LARKEN CASED 


Mel Richardson 


The Larken ZX81 Disk Interface 
is a7 X 4 inch uncased printed 
Circuit board with two ribbon 
cables and power supply wires 
attached. The board lies flat 
behind the computer and gets 
pretty awkward with a few other 
peripherals to deal with. A 
case from Radio Shack (Cat H270- 
232) will protect the exposed 
board. The case is used upside 
down, with the metal cover 
serving as a base. 

Some work must be done first. 
The *5V (red) lead should be 
moved from the trace at the 
boards edge. Follow the trace 
to a convenient spot inboard and 
solder it. It's a nice fat 
trace and easily done. 

The crystal at the drive cable 
end will need to be bent up to 
clear the rail. Take care here! 
Bending mine twice broke it off, 
but.the crystal is a stock item 
at Radio shack, a 
"Colourburst"(Cat H272-1310). 
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If you need the 8-16K area for 
Other devices, wire in the 
switch as described in Sinc-Link 
Vol 5 No 6. Otherwise just 
leave it out. 

Mount the board on the base 
far enough toward the edge 
connector end to allow access to 
it. I have the edge connector 
projecting about 1/8" past the 
base plate and it works just 
fine. File notches in the PCB 
at the mounting bolt locations 
to "lock" the board in place. I 
used a little round chainsaw 
file (very inexpensive) and this 
file can be used to help shape 
the siots and holes in the box. 

The 1/4" spacers are Radio 
Shack items as is the power jack 
(274-1565) and plug. The PC 
mounting rails were from Active 
Electronics in Toronto and some 
stick-on rubber feet complete 
the job. 

With planning and patience the 
flat black enclosure can look 
and work just like factory. 
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ZX81 EPROM BOARD 


Continued from SINC-LINK 6-1 Jan.-Feb. '88 
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Listing 1 


{0 SLOW 

20 LET E20 

30 PRINT "FIRST BYTE LOCATION TO COPY" 
40 INPUT B 

50 PRINT B 

&0 PRINT "LAST BYTE LOCATION TO COPY* 
70 INPUT C 

80 PRINT C 

90 PRINT "ENTER FIRST EEPROM BYTE LOCATION" 
100 INPUT A 

110 PRINT A 

120 LET D=PEEK B 

130 REM ERASE BYTE 

140 POKE 4.255 

150 PAUSE 2 

160 IF NOT PEEK 42255 THEN GOTO 140 
170 REM WRITE 

180 POKE A,D 

190 PAUSE 1 

200 SCROLL 

210 REM VERIFY 

220 PRINT As", "1DITAB 16:PEEK A 

230 REM NEXT ADDRESS 

240 IF E=C-B THEN 6070 300 

230 LET AsA+i 

260 LET B=B+1 

270 GOTO 120 

300 SCROLL 

310 PRINT "END OF COPY" 

320 STOP 

400 RAND USR 14335 

410 REM SAVE*EPMLD. B1" 

420 RUN 

$00 FAST 

$10 FOR N=1 TO 2048 

320 IF PEEK (14335¢N)< PEEK (81914N) THEN PRINT N 
$30 NEXT N 

$40 PRINT "END" 
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PARTS LIST 


1- PCB. RS 27£-154(4) $2.99 

1- 23/46 WW socket 0.1" spacing All Elec $4.00 

2- 24 pin WW sockets All Elec $1.00 each 

1- 24 pin ZIF socket vou are on your own here 

1- 16 pin socket RS 275-1994 $1.39/2 

2- 14 pin sockets RS 275-1993 $1.29/2 

3- 4700 cha 1/4 watt resistors RS 271-1330 $0.39/5 
ó= 0.1 ufd disk capacitors RS 272-135 $0.49 each 
1* 22ufd 16 V capacitor tantalua RS 272-1437 80,89 
2- SPOT switches RS 275-525 $1.69 each 

1- 1n914 diode RS 275-1122 $0.99/10 

1- $2813 Jaseco $1.69 

1- 74LS00 Jaseca $0.35 

1- 74L532 Jaseco $0.39 

1= 74,8139 90.89 

1- 61 18LP15 Janeco $1.95 


Listing 2 


10 SLOW 

20 LET Es1 

30 SCROLL 

40 PRINT "ENTER FIRST EEPROM BYTE LOCATION" 
$0 INPUT A 

60 SCROLL 

70 PRINT A 

80 SCROLL 

90 PRINT "ENTER BYTE IN DECIMAL" 
100 INPUT B 

110 SCROLL 

120 PRINT B 

130 REM ERASE BYTE 

140 POKE 4,255 

180 PAUSE 2 

180 IF NOT PEEK A=255 THEN GOTO 140 
170 REM WRITE 

180 POKE A,B 

190 PAUSE I 

200 SCROLL 

210 REM VERIFY 

220 SCROLL 

230 PRINT A:",";BsTAB 11:PEEK A1TAB 15:E 
240 REM NEXT ADDRESS 

250 LET Est+1 

260 LET AzA+1 

270 6070 80 

300 RAND USR 14336 

310 REM SAVE"EPMLD.B2" 

320 RUN 


v* 
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Listing 3 


10 PRINT "TC PRINT ML BEING COPIEN/POKED, * 
11 PRINT "ENTER C:70 SPEEDUP, DELETE 105," 
12 PRINT "175, SEE PPOGARM END TO REPLACE" 
12 PRINT "AFTER ML IS COPIED. USE GOTO 130" 
14 PRINT "TO PLACE ML WHERE DESIRED. IF THE" 
15 PRINT "DELETIONS WERE MADE,USE 607020" 
16 STOP 
20 PRINT "INPUT FIRST ML ADDRESS TO COPY" 
30 INPUT A 
35 PRINT A 
36 PRINT 
40 PRINT "INPUT LAST ML ADDRESS TO COPY" 
50 INPUT B 
55 PRINT B 
96 PRINT 
50 LET C=(B-A)+1 
65 DIM ES(C) 
70 PRINT "BYTES TO BE COPIED=": 
72 PAUSE 100 
75 CLS 
76 FAST 
30 LET A=A-1 
90 FOR N=1 TO C 
100 LET E$(N)=CHRS PEEK (A+N) 
105 PRINT CODE ES(N)s* *: 
110 NEXT N 
112 PRINT 
113 PRINT 
114 SLOW 
115 PRINT "TRANSFER TO STRING COMPLETE" 
116 PRINT "GOTO 310 TO TAPE SAVE:60T0 200" 
117 PRINT "FOR DISK:G0TO 130 TO MOVE ML" 
120 STOP 
128 PRINT 
130 PRINT "FIRST ML ADDRESS OF DESTINATION" 
131 PRINT "IT IS NOWs ";A+1 
140 INPUT à 
145 CLS 
146 FAST 
150 LET A=A-1 
180 FOR N=! TO C 
170 POKE (A+N),CODE E$(N) 
178 PRINT PEEK (A#N)s" "; 
180 NEXT N 
184 PRINT 
185 PRINT 
186 PRINT "ML MOVED TO DESIRED LOCATION" 
187 SLOW 
190 STOP 
200 REM "LINES 105.175 ARE BELOW SO THAT" 
201 PRINT "THEY MAY BE PE-ENTERED IF WISHED" 
205 PRINT CODE ES(N)s" — "| 
278 PRINT PEEK (A+N):" ": 
200 RAND USR 14336 
310 REM SAVE "MLCOPY. BI" 
220 6070 1 


Q&A (see Questions in last issue) 


ANSWERS 


RAMTOP establishes the upper 
limit of usable or accesible 
- memory. on start-up the computer 
will test for the amount of RAM 
in the system (ZK or 16K) and 

set RAMTOF accordingly. You can 
change the setting of RAMTOP by 
POKEing addresses 16388 and 16389 
with the desired RAMTOF in 
Low/High BIT format. RAMTOP 

is then set by entering the 
key-word NEW. Note that this will 
clear anything in your memory 
below RAMTOF. 


POKE 16389, INT (ramtop/Z56) 


PORE 16388, ramtop-(INT(ramtaop/256)*756) 


NOISE that can be heard at the 
beginning of a taped program are 
caused by ZX81 or TS1000 hardware 
interaction with the video display. 
Experiment with this by putting 
your machine in FAST mode and 
writing a short program as follows; 


10 FOR N=1 TO 100 
20 NEXT N 


WHEN you run this while monitoring 
the audio, the noise will disapear. 
In FAST mode, the video display is 
not maintained while the program 
is running, hente no noise. 
Incidentally, when you save å pro- 
gram to tape, the computer goes 
into Temporary FAST mode for the 
duration of the save. 


rb 


WANTED WANTED WANTED WANTED 
54K Rampack for TS1@@@/2x81 
Call Phil Hudsmith - 961-8785 


or see Phil at club meeting. 
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hex 
MURS. 


X e f ROE 
BANU EIEN 
VI UU (4 
PNG 


pe 
ee 
P 


A. INCL 

PUER 
Ay y 

URSI 


Å 
XD 


^e 


TOY SA 2 
NR) 
AAT 

PR 

AM KAN) 


AAN 
NANS 
These mountain ranges are actually 
fractal plots done on a 2068 with 
a VIC-1520 printer/plotter and a 
McMichael interface and Demo-Pak 
program. 

For more information on all of 

Mr. McMichael's products contact: 
Mr. John McMichael 

1710 Palmer Drive, 

Laramie, Wyoming, USA, 82070 


Postmaster, if Undelivered Return to : 


Toronto Timex - Sinciair Users Club 
P. O. Box 7274 Sin. A 

Toronto, Ont., MSW IX9 

Canada 
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